home *** CD-ROM | disk | FTP | other *** search
/ Chip 1996 December / CHIP Aralık 1996.iso / prog / backpack / demodata / dep_dir / shared.dxr / 00915_LeaveDEP.ls < prev    next >
Encoding:
Text File  |  1995-08-30  |  197 b   |  11 lines
  1. on mouseUp
  2.   global CHN, J, TWNS, K1, K4
  3.   if count(TWNS) > 1 then
  4.     set K1 to K4
  5.     sound stop CHN
  6.     sound fadeIn CHN, 150
  7.     sound playFile CHN, FixPath(J, K1)
  8.     go("Leave")
  9.   end if
  10. end
  11.